home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / kang / my baby eats light < prev    next >
Text File  |  1999-06-15  |  800b  |  33 lines
  1. Category: kang -
  2. Title: My Baby eats Light
  3. Copyright: na
  4. Author: kangaroo@asan.com
  5. Filename: eatslite.8bf
  6.  
  7. R:put((cos(sin(d+val(0,-500,1000)-1000)-cos(val(0,-100,300)-x*c/M))*(sin(c*val(1,4,100)*11/M)-sqr(x*255/M)))/11,1),put(get(1)*val(2,-180,180)/128/128+val(5,0,200),0),get(0)&256?511-(get(0)&511):get(0)+33
  8.  
  9. G:put(get(1)*val(3,-180,180)/128/128+val(6,0,200),0),get(0)&256?511-(get(0)&511):get(0)+33
  10.  
  11. B:put(get(1)*val(4,-180,180)/128/128+val(7,0,200),0),get(0)&256?511-(get(0)&511):get(0)+33
  12.  
  13. A:a
  14.  
  15. ctl[0]: Whirlywarp
  16. ctl[1]: Detail-Noise
  17. ctl[2]: R Contra-Contrast
  18. ctl[3]: G Contra-Contrast
  19. ctl[4]: B Contra-Contrast
  20. ctl[5]: Red Fill
  21. ctl[6]: Green Fill
  22. ctl[7]: Blue Fill
  23.  
  24. val[0]: 251
  25. val[1]: 109
  26. val[2]: 42
  27. val[3]: 220
  28. val[4]: 181
  29. val[5]: 119
  30. val[6]: 21
  31. val[7]: 79
  32.  
  33.